home *** CD-ROM | disk | FTP | other *** search
/ BCI NET / BCI NET Dec 94.iso / archives / programming / languages / cleo.lzh / Cleo / inter / include / glob.h next >
Encoding:
C/C++ Source or Header  |  1993-01-24  |  1.5 KB  |  46 lines

  1. /***************************************************************************
  2. *   Ce fichier, ainsi que tous les  modules  l'accompagnant, peut et  doit *
  3. * etre  copié GRATUITEMENT à la seule condition expresse de conserver      *
  4. * l'INTEGRALITE  du  Code Source, de  la documentation, et  des fichiers   *
  5. * annexes du package. Ce logiciel est Shareware, veuilez envoyer 100 FF à  *
  6. * l'auteur pour recevoir regulièrement les nouvelles versions.             *
  7. * Toute modification est INTERDITE sans l'autorisation écrite de l'auteur. *
  8. *            Tous droits réservés à M. DIALLO Barrou, Juillet 1992.        *
  9. ***************************************************************************/
  10.  
  11. PRG *prg;
  12.  
  13. FILE *CodeF;             /* Fichier du P-Code */
  14. char *Char= NULL;
  15. long *Int=NULL;
  16. double *Real=NULL;
  17. char **String=NULL;
  18. Entete head;
  19.  
  20. EXTLIB *lib=NULL;
  21. char *Vchar = NULL;
  22. unsigned char *Vboolean=NULL;
  23. int *Vinteger = NULL;
  24. long *Vlongint;
  25. double *Vreal = NULL;
  26. double *Vlongreal;
  27. char **Vstring= NULL;
  28. TAB *Varray=NULL;    /*Structure de donnee Array 'double' en interne */
  29. Point3d *Vpoint3d;
  30. Point2d *Vpoint2d;
  31. Rgb *Vrgb;
  32.  
  33. MY_CONST *stack=NULL;
  34. int stsz = 5000;    /* Taille pile */
  35. int st=0;        /* pnt de pile */
  36. int lastcode=0;
  37. double regReal=0,regReal2=0,regReal3=0,regReal4=0;    /* registre pour les reels long*/
  38. double Val[10];
  39.  
  40. Erreur ExecErrs[] = {
  41.     "Depassement de pile, changer la taille",0,
  42.     "Depassement de pile", 1,
  43.     "Code Inconnu",2,
  44.     (char *)NULL,0
  45.     };
  46.